(help-map): Define C-h C-i to run word-help.

diff --git a/lisp/help.el b/lisp/help.el
index 3d44f6ea97a80e4fb75312373f4b8bbe33e5d8a7..9f4c2cf352b731eb5adcf95a28dec89cf0c4de32 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -68,6 +68,7 @@
 (define-key help-map "i" 'info)
 (define-key help-map "\C-f" 'Info-goto-emacs-command-node)
 (define-key help-map "\C-k" 'Info-goto-emacs-key-command-node)
+(define-key help-map "\C-i" 'word-help)
 
 (define-key help-map "l" 'view-lossage)